#include <iostream>
#include <string>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <ctype.h>
#include <stdlib.h>
#include <unistd.h>
#include <unordered_map>
#include <cstring>
#include "Log.hpp"
using namespace std;

/// @brief  写一个简单的udpServer
// 云服务器有一些特殊的情况：
// 1.禁止bind云服务器上的任何确定IP，只能使用INADDR_ANY
class UdpServer
{
public:
    UdpServer(int port, std::string ip = "")
        : _port((uint16_t)port), _ip(ip), _sockfd(-1)
    {
    }

    ~UdpServer() {}

    void init()
    {
        // 1.创建socket套接字
        _sockfd = socket(AF_INET, SOCK_DGRAM, 0); // 就是打开了一个文件
        if (_sockfd < 0)
        {
            logMessage(FATAL, "socket:%s:%d", strerror(errno), _sockfd);
            exit(1);
        }
        logMessage(DEBUG, "socket create success:%d", _sockfd);

        // 2.绑定网络信息，指明ip+port
        // 2.1:先填充基本信息到struct sockaddr_in
        struct sockaddr_in local;      // lock在用户栈上开辟的空间 -> 临时变量 -> 写入内核中
        bzero(&local, sizeof(local));  // memset
        local.sin_family = AF_INET;    // 填充协议家族，域
        local.sin_port = htons(_port); // 填充服务器对应的端口信息，一定会发给对方，_port一定会到网络中
        // local.sin_addr // 服务器都必须具有IP地址("xx.yy.zz.aaa"字符串风格点分十进制) -> 4字节IP -> uint32_t ip
        local.sin_addr.s_addr = _ip.empty() ? htonl(INADDR_ANY) : inet_addr(_ip.c_str());

        // 2.2:bind网络信息
        if (bind(_sockfd, (const struct sockaddr *)&local, sizeof(local)) == -1)
        {
            logMessage(FATAL, "bind:%s:%d", strerror(errno), _sockfd);
            exit(2);
        }
        logMessage(DEBUG, "socket bind success:%d", _sockfd);
    }
    void start()
    {
        // 服务器设计的时候都是死循环
        char inbuffer[1024];  // 将来读取到的数据，都放在这里
        char outbuffer[1024]; // 将来发送的数据，都放在这里
        while (true)
        {
            struct sockaddr_in peer;      // 输出型参数
            socklen_t len = sizeof(peer); // 输入型参数

            // 对方给你发了消息，需要读取，后面的两个参数是输出型参数
            ssize_t s = recvfrom(_sockfd, inbuffer, sizeof(inbuffer) - 1, 0, (struct sockaddr *)&peer, &len);

            if (s > 0)
            {
                inbuffer[s] = 0; // 当作字符串
            }
            else if (s == -1)
            {
                logMessage(WARINING, "recvfrom:%s:%d", strerror(errno), _sockfd);
                continue;
            }
            // 读取成功,除了读取到对方的数据，还要读到对方的网络地址[ip,port]
            std::string peerIp = inet_ntoa(peer.sin_addr);
            uint32_t peerPort = ntohs(peer.sin_port);

            checkOnlineUser(peerIp, peerPort, peer); // 如果存在，什么都不做，如果不存在，就添加

            // 打印客户端给服务器发送过来的消息
            logMessage(NOTICE, "[%s:%d]# %s", peerIp.c_str(), peerPort, inbuffer);

            // for (int i = 0; i < strlen(inbuffer); i++)
            // {
            //     if (isalpha(inbuffer[i]) && islower(inbuffer[i]))
            //         outbuffer[i] = toupper(inbuffer[i]);
            //     else
            //         outbuffer[i] = toupper(inbuffer[i]);
            // }

            messageRoute(peerIp, peerPort, inbuffer); // 消息路由
            // sendto(_sockfd, outbuffer, strlen(outbuffer), 0, (struct sockaddr *)&peer, len);
        }
    }

    void checkOnlineUser(std::string &ip, uint32_t port, struct sockaddr_in &peer)
    {
        string key = ip;
        key += ":";
        key += to_string(port);
        auto iter = users.find(key);
        if (iter == users.end())
            users.insert({key, peer});
        else
        {
        }
    }

    void messageRoute(string ip, uint32_t port, string info)
    {
        string message = "[";
        message += ip;
        message += ":";
        message += to_string(port);
        message += "]# ";
        message += info;
        for (auto &user : users)
        {
            sendto(_sockfd, message.c_str(), message.size(), 0, (struct sockaddr *)&(user.second), sizeof(user.second));
        }
    }

private:
    uint16_t _port;                                  // 服务器必须得有端口号信息
    std::string _ip;                                 // 服务器必须得有IP地址
    int _sockfd;                                     // 服务器的socket fd信息
    unordered_map<string, struct sockaddr_in> users; // onlineuser
};

static void Usage(const std::string proc)
{
    cout << "Usage:\n\t" << proc << " port [ip]" << endl;
}

// ./udpServer port [ip]
int main(int argc, char *argv[])
{
    if (argc != 2 && argc != 3)
    {
        Usage(argv[0]);
        exit(3);
    }
    uint16_t port = atoi(argv[1]);

    string ip;
    if (argc == 3)
    {
        ip = argv[2];
    }

    UdpServer svr(port, ip);
    svr.init();
    svr.start();
    return 0;
}